home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Markets / Education / HyperCard In Education / Charlotte's Web / background_5314.txt < prev    next >
Text File  |  1990-04-02  |  5KB  |  240 lines

  1. -- background: 5314 from stack: in
  2. -- bmap block id: 12133
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: Plot Menu
  6.  
  7.  
  8. -- part 16 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=19 top=266 right=303 bottom=57
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: To Menu
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   play "boing"
  23.   visual effect iris close
  24.   go to card id 20526
  25. end mouseUp
  26.  
  27.  
  28.  
  29.  
  30. -- part 29 (button)
  31. -- low flags: 00
  32. -- high flags: 0006
  33. -- rect: left=99 top=193 right=226 bottom=120
  34. -- title width / last selected line: 0
  35. -- icon id / first selected line: 0 / 0
  36. -- text alignment: 1
  37. -- font id: 0
  38. -- text size: 12
  39. -- style flags: 0
  40. -- line height: 16
  41. -- part name: Event 1
  42. ----- HyperTalk script -----
  43. on mouseDown
  44.   set hilite of background button "Event 1" to true
  45. end mouseDown
  46. on mouseUp
  47.   set hilite of background button "Event 1" to false
  48.   go to card "Plot 1"
  49.   wait for 2 seconds
  50.   go to card "Event 1"
  51. end mouseUp
  52.  
  53.  
  54. -- part 30 (button)
  55. -- low flags: 00
  56. -- high flags: 0006
  57. -- rect: left=167 top=184 right=217 bottom=188
  58. -- title width / last selected line: 0
  59. -- icon id / first selected line: 0 / 0
  60. -- text alignment: 1
  61. -- font id: 0
  62. -- text size: 12
  63. -- style flags: 0
  64. -- line height: 16
  65. -- part name: Event 2
  66. ----- HyperTalk script -----
  67. on mouseDown
  68.   set hilite of background button "Event 2" to true
  69. end mouseDown
  70. on mouseUp
  71.   set hilite of background button "Event 2" to false
  72.   go to card "Plot 2"
  73.   wait for 2 seconds
  74.   go to card "Event 2"
  75. end mouseUp
  76.  
  77.  
  78. -- part 31 (button)
  79. -- low flags: 00
  80. -- high flags: 0006
  81. -- rect: left=216 top=139 right=172 bottom=237
  82. -- title width / last selected line: 0
  83. -- icon id / first selected line: 0 / 0
  84. -- text alignment: 1
  85. -- font id: 0
  86. -- text size: 12
  87. -- style flags: 0
  88. -- line height: 16
  89. -- part name: event 3
  90. ----- HyperTalk script -----
  91. on mouseDown
  92.   set hilite of background button "Event 3" to true
  93. end mouseDown
  94. on mouseUp
  95.   set hilite of background button "Event 3" to false
  96.   go to card "Plot 3"
  97.   wait for 2 seconds
  98.   go to card "Event 3"
  99. end mouseUp
  100.  
  101.  
  102. -- part 32 (button)
  103. -- low flags: 00
  104. -- high flags: 0006
  105. -- rect: left=276 top=119 right=152 bottom=297
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 0 / 0
  108. -- text alignment: 1
  109. -- font id: 0
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: event 4
  114. ----- HyperTalk script -----
  115. on mouseDown
  116.   set hilite of background button "Event 4" to true
  117. end mouseDown
  118. on mouseUp
  119.   set hilite of background button "Event 4" to false
  120.   go to card "Plot 4"
  121.   wait for 2 seconds
  122.   go to card "Event 4"
  123. end mouseUp
  124.  
  125.  
  126. -- part 33 (button)
  127. -- low flags: 00
  128. -- high flags: 0006
  129. -- rect: left=335 top=82 right=115 bottom=356
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 1
  133. -- font id: 0
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: Event 5
  138. ----- HyperTalk script -----
  139. on mouseDown
  140.   set hilite of background button "Event 5" to true
  141. end mouseDown
  142. on mouseUp
  143.   set hilite of background button "Event 5" to false
  144.   go to card "Plot 5"
  145.   wait for 2 seconds
  146.   go to card "Event 5"
  147. end mouseUp
  148.  
  149.  
  150. -- part 34 (button)
  151. -- low flags: 00
  152. -- high flags: 0006
  153. -- rect: left=397 top=68 right=101 bottom=418
  154. -- title width / last selected line: 0
  155. -- icon id / first selected line: 0 / 0
  156. -- text alignment: 1
  157. -- font id: 0
  158. -- text size: 12
  159. -- style flags: 0
  160. -- line height: 16
  161. -- part name: Event 6
  162. ----- HyperTalk script -----
  163. on mouseDown
  164.   set hilite of background button "Event 6" to true
  165. end mouseDown
  166. on mouseUp
  167.   set hilite of background button "Event 6" to false
  168.   go to card "Plot 6"
  169.   wait for 2 seconds
  170.   go to card "Event 6"
  171. end mouseUp
  172.  
  173.  
  174. -- part 35 (button)
  175. -- low flags: 00
  176. -- high flags: 0006
  177. -- rect: left=351 top=211 right=244 bottom=372
  178. -- title width / last selected line: 0
  179. -- icon id / first selected line: 0 / 0
  180. -- text alignment: 1
  181. -- font id: 0
  182. -- text size: 12
  183. -- style flags: 0
  184. -- line height: 16
  185. -- part name: Event 7
  186. ----- HyperTalk script -----
  187. on mouseDown
  188.   set hilite of background button "Event 7" to true
  189. end mouseDown
  190. on mouseUp
  191.   set hilite of background button "Event 7" to false
  192.   go to card "Plot 7"
  193.   wait for 2 seconds
  194.   go to card "Event 7"
  195. end mouseUp
  196.  
  197.  
  198. -- part 37 (button)
  199. -- low flags: 00
  200. -- high flags: 0006
  201. -- rect: left=425 top=184 right=217 bottom=446
  202. -- title width / last selected line: 0
  203. -- icon id / first selected line: 0 / 0
  204. -- text alignment: 1
  205. -- font id: 0
  206. -- text size: 12
  207. -- style flags: 0
  208. -- line height: 16
  209. -- part name: Event 8
  210. ----- HyperTalk script -----
  211. on mouseDown
  212.   set hilite of background button "Event 8" to true
  213. end mouseDown
  214. on mouseUp
  215.   set hilite of background button "Event 8" to false
  216.   go to card "Plot 8"
  217.   wait for 2 seconds
  218.   go to card "Event 8"
  219. end mouseUp
  220.  
  221.  
  222. -- part 38 (button)
  223. -- low flags: 00
  224. -- high flags: A002
  225. -- rect: left=16 top=319 right=340 bottom=76
  226. -- title width / last selected line: 0
  227. -- icon id / first selected line: 0 / 0
  228. -- text alignment: 1
  229. -- font id: 0
  230. -- text size: 12
  231. -- style flags: 0
  232. -- line height: 16
  233. -- part name: Return
  234. ----- HyperTalk script -----
  235. on mouseUp
  236.   global ReturnCard
  237.   go ReturnCard
  238. end mouseUp
  239.  
  240.